
 
 '   T h e r e m i n o   A u t o m a t i o n   d e m o   p r o g r a m 
 
 
 
 '   D e m o n s t r a t i n g   n e s t e d   G o S u b   a n d   R e t u r n 
 
 
 
 L a b e l   L o o p 1 
 
 	 P r i n t   " L o o p   1 " 
 
 	 S l o t ( 1 )   =   1 0 0 0 
 
 	 S l o t ( 1 )   =   0 
 
 	 S l o t ( 2 )   =   1 0 0 0 
 
 	 S l o t ( 2 )   =   0 
 
 	 W a i t   S e c o n d s   1 
 
 	 G o s u b   s u b 1 
 
 	 B e e p 
 
 	 W a i t   S e c o n d s   1 
 
 	 S l o t ( 3 )   =   1 0 0 0 
 
 	 S l o t ( 3 )   =   0 
 
 	 S l o t ( 4 )   =   1 0 0 0 
 
 	 S l o t ( 4 )   =   0 
 
 G o t o   L o o p 1 
 
 
 
 L a b e l   s u b 1 
 
 	 P r i n t   " S u b   1 " 
 
 	 W a i t   S e c o n d s   1 
 
 	 G o s u b   S u b 2 
 
 	 B e e p 
 
 	 W a i t   S e c o n d s   1 
 
 R e t u r n 
 
 
 
 L a b e l   S u b 2 
 
 	 P r i n t   " S u b   2 " 
 
 	 W a i t   S e c o n d s   1 
 
 R e t u r n 
 
 
 
 